﻿Imports Entidades

Imports ProyectoEnCapa.Dato1


Public Class NHorarios
    Dim x As ProyectoEnCapa.Dato1
    Sub New()
        x = New ProyectoEnCapa.Dato1

    End Sub
    Function agregahorario(nodo As Entidades.Horarios) As Boolean
        validohorario()

        Return x.agregahorario(nodo)

    End Function
    Function consultahorarios() As DataSet
        Return x.consultahorarios()

    End Function
    Private Sub validohorario()
        Throw New NotImplementedException
    End Sub

End Class
